home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / CRESC / Lengths / gen-beat⁄space < prev    next >
Lisp/Scheme  |  1996-12-31  |  682b  |  13 lines

  1. gen-beat/space seed ratio-m ratio-n length value
  2.  
  3. This function simulates the def-instrument-rhythm beat/space string in a note-length format. Many ethnic musics as well as western rock music use the beat/space formulism for rhythm construction.
  4.  
  5. (setq rhy (gen-beat/space 0.12  3 1 '24 16))
  6.  
  7. --> (24 24 24 24 -24 24 24 24 24 24 24 -24 24 24 24 24)
  8.  
  9. (setq melz (fill-template rhy '(a b c d)))
  10.  
  11. --> (a b c d a b c d a b c d a b c d)
  12.  
  13. The quantity and distribution of lengths and rest lengths (beats and spaces)  are controlled by ratio-m and ratio-n settings. In the example above the ratio is set to control the random operation to have a distribution of 3 lengths to 1 rest length.